home *** CD-ROM | disk | FTP | other *** search
/ MacAddict 91 / MacAddict_091_2004-03.iso / pc / Software / Interface / Mighty Mouse 1.1.2.dmg / Mighty Mouse 1.1.2 Installer.app / Contents / Resources / ui / post-install.pl < prev    next >
Encoding:
Perl Script  |  2003-07-08  |  633 b   |  19 lines

  1. #!/usr/bin/perl
  2.  
  3. $path = $ENV{UI_INSTALL_FILE};
  4. $desktopPath = "$ENV{'HOME'}/Desktop/Mighty\ Mouse\ Read\ Me.rtfd";
  5.  
  6. $apePath1 = "/Library/Application\ Enhancers/Mighty\ Mouse.ape";
  7. $apePath2 = "$ENV{'HOME'}/Library/Application\ Enhancers/Mighty\ Mouse.ape";
  8.  
  9. if (-e $apePath1) {
  10.     $fromPath = $apePath1 . "/Contents/Resources/APEInfo.rtfd";
  11. } elsif (-e $apePath2) {
  12.     $fromPath = $apePath2 . "/Contents/Resources/APEInfo.rtfd";
  13. }
  14.  
  15. if ($fromPath and $path) {
  16.     symlink($fromPath, $path . "/Contents/Resources/Mighty\ Mouse\ Read\ Me.rtfd");
  17.     $copyCommand = "/bin/cp -R \"" . $fromPath . "\" \"" . $desktopPath . "\"";
  18.     `$copyCommand`;
  19. }